perm filename THAT.IMS[10X,AIL]1 blob sn#143198 filedate 1975-02-01 generic text, type T, neo UTF8
00100	RESTAB.=PROD/FORWARD+FOO2[10X,AIL]/NOLIST/NOLO/NON RTRAN
00200	PROD.=HEL[S,AIL]/NOLIST/NOLO/NON PTRAN[S,AIL]
00300	SAIL=TENXSW.IMS+DEFJS+JSYSES+HEAD[S,AIL](LR)+DB+SAIL[S,AIL]+CC+PARSE[S,AIL]+FOO2[S,AIL]+;
00400	PROD/FORWARD+DATA+RESTAB/FORWARD+ENDDAT  ;
00500	    +SYM[S,AIL]+GEN[S,AIL]+ARRAY[S,AIL]+EXPRS[S,AIL];
00600	+STATS[S,AIL]+LEAP[S,AIL]+TOTAL[S,AIL]+PROCSS[S,AIL]+COMSER[S,AIL]